home *** CD-ROM | disk | FTP | other *** search
- Subject: v06i022: Manual page for context program (context.1)
- Newsgroups: mod.sources
- Approved: rs@mirror.UUCP
-
- Submitted by: cbosgd!pegasus!hansen
- Mod.sources: Volume 6, Issue 22
- Archive-name: context.1
-
- [ Tony Hansen sent me article <728@ncoast.UUCP> from net.sources, a
- manual page for the recently-posted context program. It was
- written by Jyrki Yli-Nokari (...!mcvax!enea!tut!jty). Tony
- also rightly takes me to task for letting things out without
- any manpages. He's right ("a little quality control goes a long
- way"); it won't happen again. --r$]
-
- --------------------CUT HERE--------------------
- #!/bin/sh
- # This is a shell archive. Remove anything before this line,
- # then unpack it by saving it in a file and typing "sh file".
- # Contents: context.1
-
- echo x - context.1
- sed 's/^XX//' > "context.1" <<'@//E*O*F context.1//'
- XX.TH CONTEXT 1 "6 June 1985"
- XX.\" $Header: context.c,v 1.4 85/05/27 21:51:34 bsa Exp $
- XX.SH NAME
- XXcontext \- find context of lines
- XX.SH SYNOPSIS
- XX.B context
- XX[
- XX.B nr_of_lines
- XX]
- XX.PP
- XX.SH DESCRIPTION
- XX.I Context
- XXfinds the context of located text. It accepts for example
- XXcc(1) diagnostics as standard input and gives you the context.
- XX.SH OPTIONS
- XXIf the optional argument; a number `nr_of_lines' is given,
- XXcontext(1) prints that much context before
- XXand after the line in question.
- XX.SH EXAMPLES
- XX.nf
- XX% cc foo.c |& context
- XX**************
- XX* "foo.c", line 5: warning: old-fashioned initialization: use =
- XX*****
- XX
- XX main() {
- XX int i;
- XX* long ix.v;
- XX
- XX i = getpid();
- XX if (ix_v = getchar() == EOF)
-
- XX**************
- XX* "foo.c", line 5: syntax error
- XX*****
- XX
- XX main() {
- XX int i;
- XX* long ix.v;
- XX
- XX i = getpid();
- XX if (ix_v = getchar() == EOF)
-
- XX**************
- XX* "foo.c", line 5: warning: old-fashioned initialization: use =
- XX*****
- XX
- XX main() {
- XX int i;
- XX* long ix.v;
- XX
- XX i = getpid();
- XX if (ix_v = getchar() == EOF)
-
- XX**************
- XX* "foo.c", line 5: v undefined
- XX*****
- XX
- XX main() {
- XX int i;
- XX* long ix.v;
- XX
- XX i = getpid();
- XX if (ix_v = getchar() == EOF)
-
- XX**************
- XX* "foo.c", line 8: ix_v undefined
- XX*****
- XX long ix.v;
- XX
- XX i = getpid();
- XX* if (ix_v = getchar() == EOF)
- XX exit(1);
- XX exit(0);
- XX }
-
-
- XX%
- XX.fi
- XX.SH "SEE ALSO"
- XXcc(1), grep(1)
- XX.SH AUTHOR
- XXCopyright (C) 1985 by North Coast Programming.
-
- XXThis program, and any documentation for it, is copyrighted by North Coast
- XXProgramming. It may be copied for non-commercial use only, provided that
- XXany and all copyright notices are preserved.
-
- XXPlease report any bugs and/or fixes to:
-
- XX.nf
- XXNorth Coast Programming
- XX6504 Chestnut Road
- XXIndependence, OH 44131
-
- XX\&...decvax!cwruecmp!ncoast!bsa
- XXncoast!bsa@Case.CSNet
-
- XXThis manual page by ...!mcvax!enea!tut!jty (Jyrki Yli-Nokari), to
- XXwhom I give many thanks.
- @//E*O*F context.1//
- chmod u=rw,g=rw,o=rw context.1
-
- echo Inspecting for damage in transit...
- temp=/tmp/sharin$$; dtemp=/tmp/sharout$$
- trap "rm -f $temp $dtemp; exit" 0 1 2 3 15
- cat > $temp <<\!!!
- 100 290 1850 context.1
- !!!
- wc context.1 | sed 's=[^ ]*/==' | diff -b $temp - >$dtemp
- if test -s $dtemp
- then echo "Ouch [diff of wc output]:" ; cat $dtemp
- else echo "No problems found."
- fi
- exit 0
-